如果你是第一次阅读本文，你可能会对以下资源贴感兴趣：

用R进行文件系统管理
R语言：文件操作

R语言进行文件管理

批量解压文件

path中的’I:\\anqi\\项目\\人民银行\\gdelt’绝对路径中，gdelt文件夹内都是准备解压的压缩文件。只要修改下面的路径就可以实现批量解压的功能，解压之后的文件将会在gdelt\\result文件夹里出现。

1
2
3
4
5
6
7
8

path='I:\\anqi\\项目\\人民银行\\gdelt'
setwd(path)
FileName=dir(path)
dir.create('result')
targetPath=paste0(path,'\\result')
sapply(FileName, function(x) unzip(x,exdir = targetPath))

批量读取csv文件

‘I:\\anqi\\项目\\人民银行\\gdelt\\result’中含有大量格式为“1979.csv”的数据文件，以下代码实现将数据导入R的工作空间中，每个csv的数据和前缀为‘Data_’的变量联系起来

1
2
3
4
5
6
7

path='I:\\anqi\\项目\\人民银行\\gdelt\\result'
setwd(path)
FileName=dir(path)
for(myfile in FileName) {
  eval(parse(text = paste0('Data_',substr(myfile,1,4),"=read.csv('",myfile,"',header=F,sep='\t')")))
}

• ← Previous Post
• Next Post →